#!/usr/bin/perl

use English;

print $PROGRAM_NAME . "\n";
$argc = $#ARGV + 1;
print "Anzahl der Argumente: $argc\n";
foreach $arg (@ARGV) {
	print $arg . "\n";
}
print $ARGV[1] . "\n";
